home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / room3d / fmain.frm < prev    next >
Text File  |  1999-02-23  |  1KB  |  50 lines
  1. VERSION 5.00
  2. Begin VB.Form fMain 
  3.    BackColor       =   &H00000000&
  4.    BorderStyle     =   0  'None
  5.    ClientHeight    =   7230
  6.    ClientLeft      =   0
  7.    ClientTop       =   0
  8.    ClientWidth     =   9615
  9.    ControlBox      =   0   'False
  10.    FillStyle       =   0  'Solid
  11.    ForeColor       =   &H00000000&
  12.    Icon            =   "fMain.frx":0000
  13.    KeyPreview      =   -1  'True
  14.    LinkTopic       =   "Form1"
  15.    MousePointer    =   4  'Icon
  16.    ScaleHeight     =   482
  17.    ScaleMode       =   3  'Pixel
  18.    ScaleWidth      =   641
  19.    ShowInTaskbar   =   0   'False
  20.    StartUpPosition =   2  'CenterScreen
  21.    WindowState     =   2  'Maximized
  22.    Begin VB.Image IMG 
  23.       Height          =   75
  24.       Left            =   -30
  25.       Top             =   -120
  26.       Visible         =   0   'False
  27.       Width           =   60
  28.    End
  29. End
  30. Attribute VB_Name = "fMain"
  31. Attribute VB_GlobalNameSpace = False
  32. Attribute VB_Creatable = False
  33. Attribute VB_PredeclaredId = True
  34. Attribute VB_Exposed = False
  35. 'A compilation of various sources to display D3DRM in fullscreen
  36. 'Compiled by Darkphorm
  37. 'http://www.geocities.com/SiliconValley/Hills/6216/projects.html
  38. 'darkphorm@hotmail.com
  39. Option Explicit
  40. Private Sub Form_Unload(Cancel As Integer)
  41. ' Enable error handling...
  42.     On Error Resume Next
  43. ' Terminate application...
  44.     ' Cleanup application data
  45.     Call AppTerminate
  46.     Me.Hide
  47.     ' Terminate application
  48.     End
  49. End Sub
  50.